e <- exp(1)
d <- 15
biomassa1 <- (e^-1.7953) * (d^2.2974)
h <- 12
biomassa2 <- e ^ ((-2.6464) + (1.9960 * log(d)) + (0.7558 * log(h)))